home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 1 / PC Actual CD 01.iso / share / dos / graficos / plydat14.arj / TBLOB.PI < prev    next >
Encoding:
Text File  |  1992-04-05  |  944 b   |  54 lines
  1. viewpoint {
  2.    from <0, 3, -6>
  3.    at <0,0,0>
  4.    up <0,1,0>
  5.    angle 30
  6.    resolution 256, 256
  7.    aspect 1
  8.    }
  9. background SkyBlue
  10. light <-15,30,-25>
  11.  
  12. define matte_white
  13. texture {
  14.    surface {
  15.       ambient white, 0.4
  16.       diffuse white, 0.6
  17.       }
  18.    }
  19.  
  20. define matte_black
  21. texture {
  22.    surface {
  23.       ambient DarkSlateGray, 0.3
  24.       diffuse DarkSlateGray, 0.2
  25.       }
  26.    }
  27.  
  28. define glass
  29. texture {
  30.    surface {
  31.       ambient 0
  32.       diffuse 0
  33.       specular 0.2
  34.       transmission white, 1, 1.5
  35.       }
  36.    }
  37.  
  38. object {
  39.    blob 0.6:
  40.       1.0, 1.0, <0.75, 0, 0>,
  41.       1.0, 1.0, <0.75*cos(radians(120)), 0.75*sin(radians(120)), 0>,
  42.       1.0, 1.0, <0.75*cos(radians(240)), 0.75*sin(radians(240)), 0>
  43.    root_solver Ferrari
  44.    glass
  45.    rotate <0,30,0>
  46.    }
  47.  
  48. // Create a ground plane
  49. object {
  50.    polynomial y + 0.1
  51.    texture { checker matte_white, matte_black }
  52.    translate <0,-2.5,0>
  53.    }
  54.